factory <- read.table("data-raw/factory.txt")
usethis::use_data(factory)
